/ BBS in a Box 10 / BBS In A Box Volume X (AMUG) (January 1994).bin / Files / Prog / U-Z / VideoToolBox.cpt / VideoToolboxSources / GDTimeClut.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 47 44 54 69 6d 65 | 43 6c 75 74 2e 63 00 00 |..GDTime|Clut.c..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 13 f8 00 | 00 01 b4 a7 ca d5 a5 a7 |........|........|
|00000060| ca d5 a5 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 65 67 00 00 |........|....eg..|
|00000080| 2f 2a 0d 47 44 54 69 6d | 65 43 6c 75 74 2e 63 0d |/*.GDTim|eClut.c.|
|00000090| 0d 65 72 72 6f 72 3d 47 | 44 54 69 6d 65 43 6c 75 |.error=G|DTimeClu|
|000000a0| 74 28 64 65 76 69 63 65 | 2c 47 44 53 65 74 45 6e |t(device|,GDSetEn|
|000000b0| 74 72 69 65 73 2c 63 6c | 75 74 45 6e 74 72 69 65 |tries,cl|utEntrie|
|000000c0| 73 2c 26 73 2c 26 66 72 | 61 6d 65 73 2c 26 6d 69 |s,&s,&fr|ames,&mi|
|000000d0| 73 73 69 6e 67 46 72 61 | 6d 65 73 2c 26 66 72 61 |ssingFra|mes,&fra|
|000000e0| 6d 65 52 61 74 65 29 3b | 0d 0d 47 44 54 69 6d 65 |meRate);|..GDTime|
|000000f0| 43 6c 75 74 20 6d 65 61 | 73 75 72 65 73 20 68 6f |Clut mea|sures ho|
|00000100| 77 20 6c 6f 6e 67 20 69 | 74 20 74 61 6b 65 73 20 |w long i|t takes |
|00000110| 74 6f 20 6c 6f 61 64 20 | 74 68 65 20 63 6c 75 74 |to load |the clut|
|00000120| 2e 20 49 74 20 6d 65 61 | 73 75 72 65 73 20 69 6e |. It mea|sures in|
|00000130| 20 74 77 6f 20 6b 69 6e | 64 73 0d 6f 66 20 75 6e | two kin|ds.of un|
|00000140| 69 74 73 20 73 69 6d 75 | 6c 74 61 6e 65 6f 75 73 |its simu|ltaneous|
|00000150| 6c 79 2c 20 66 72 61 6d | 65 73 20 61 6e 64 20 73 |ly, fram|es and s|
|00000160| 65 63 6f 6e 64 73 2e 20 | 59 6f 75 20 73 75 70 70 |econds. |You supp|
|00000170| 6c 79 20 74 68 65 20 66 | 75 6e 63 74 69 6f 6e 20 |ly the f|unction |
|00000180| 74 6f 20 62 65 0d 74 65 | 73 74 65 64 2c 20 65 2e |to be.te|sted, e.|
|00000190| 67 2e 20 53 65 74 45 6e | 74 72 69 65 73 51 75 69 |g. SetEn|triesQui|
|000001a0| 63 6b 6c 79 20 6f 72 20 | 47 44 53 65 74 45 6e 74 |ckly or |GDSetEnt|
|000001b0| 72 69 65 73 2e 20 28 49 | 66 20 6d 6f 64 65 3e 65 |ries. (I|f mode>e|
|000001c0| 69 67 68 74 42 69 74 4d | 6f 64 65 20 47 44 54 69 |ightBitM|ode GDTi|
|000001d0| 6d 65 43 6c 75 74 0d 77 | 69 6c 6c 20 61 75 74 6f |meClut.w|ill auto|
|000001e0| 6d 61 74 69 63 61 6c 6c | 79 20 73 75 62 73 74 69 |maticall|y substi|
|000001f0| 74 75 74 65 20 47 44 44 | 69 72 65 63 74 53 65 74 |tute GDD|irectSet|
|00000200| 45 6e 74 72 69 65 73 20 | 66 6f 72 20 47 44 53 65 |Entries |for GDSe|
|00000210| 74 45 6e 74 72 69 65 73 | 2e 29 20 54 68 65 20 73 |tEntries|.) The s|
|00000220| 65 63 6f 6e 64 0d 61 72 | 67 75 6d 65 6e 74 2c 20 |econd.ar|gument, |
|00000230| 22 63 6c 75 74 45 6e 74 | 72 69 65 73 22 2c 20 73 |"clutEnt|ries", s|
|00000240| 70 65 63 69 66 69 65 73 | 20 68 6f 77 20 6d 61 6e |pecifies| how man|
|00000250| 79 20 63 6c 75 74 20 65 | 6e 74 72 69 65 73 20 79 |y clut e|ntries y|
|00000260| 6f 75 20 77 61 6e 74 20 | 74 6f 20 75 70 64 61 74 |ou want |to updat|
|00000270| 65 20 65 61 63 68 0d 74 | 69 6d 65 2c 20 6f 72 20 |e each.t|ime, or |
|00000280| 7a 65 72 6f 20 66 6f 72 | 20 61 6c 6c 2c 20 65 2e |zero for| all, e.|
|00000290| 67 2e 20 61 6c 6c 20 32 | 35 36 20 69 6e 20 38 2d |g. all 2|56 in 8-|
|000002a0| 62 69 74 20 6d 6f 64 65 | 2e 20 49 74 20 61 6c 73 |bit mode|. It als|
|000002b0| 6f 20 6d 65 61 73 75 72 | 65 73 20 74 68 65 20 66 |o measur|es the f|
|000002c0| 72 61 6d 65 0d 72 61 74 | 65 20 69 6e 64 65 70 65 |rame.rat|e indepe|
|000002d0| 6e 64 65 6e 74 6c 79 2c | 20 77 68 69 63 68 20 69 |ndently,| which i|
|000002e0| 74 20 72 65 74 75 72 6e | 73 2c 20 61 66 74 65 72 |t return|s, after|
|000002f0| 20 75 73 69 6e 67 20 69 | 74 20 74 6f 20 65 73 74 | using i|t to est|
|00000300| 69 6d 61 74 65 20 68 6f | 77 20 6d 61 6e 79 20 66 |imate ho|w many f|
|00000310| 72 61 6d 65 0d 69 6e 74 | 65 72 72 75 70 74 73 20 |rame.int|errupts |
|00000320| 77 65 72 65 20 6d 69 73 | 73 65 64 20 64 75 72 69 |were mis|sed duri|
|00000330| 6e 67 20 65 61 63 68 20 | 63 6c 75 74 20 6c 6f 61 |ng each |clut loa|
|00000340| 64 2e 20 49 66 20 74 68 | 65 72 65 27 73 20 61 74 |d. If th|ere's at|
|00000350| 20 6c 65 61 73 74 20 6f | 6e 65 20 66 72 61 6d 65 | least o|ne frame|
|00000360| 0d 6d 69 73 73 69 6e 67 | 20 6f 72 20 69 66 20 74 |.missing| or if t|
|00000370| 68 65 20 66 72 61 6d 65 | 20 63 6f 75 6e 74 20 69 |he frame| count i|
|00000380| 73 20 76 65 72 79 20 73 | 6d 61 6c 6c 2c 20 6c 65 |s very s|mall, le|
|00000390| 73 73 20 74 68 61 6e 20 | 30 2e 35 20 70 65 72 20 |ss than |0.5 per |
|000003a0| 63 61 6c 6c 2c 20 74 68 | 65 6e 20 69 74 0d 65 73 |call, th|en it.es|
|000003b0| 74 69 6d 61 74 65 73 20 | 74 68 65 20 66 72 61 6d |timates |the fram|
|000003c0| 65 73 20 64 69 72 65 63 | 74 6c 79 20 66 72 6f 6d |es direc|tly from|
|000003d0| 20 74 68 65 20 74 69 6d | 65 2e 20 59 6f 75 20 6d | the tim|e. You m|
|000003e0| 61 79 20 73 75 62 73 74 | 69 74 75 74 65 20 4e 55 |ay subst|itute NU|
|000003f0| 4c 4c 20 66 6f 72 20 61 | 6e 79 20 6f 66 0d 74 68 |LL for a|ny of.th|
|00000400| 65 20 70 6f 69 6e 74 65 | 72 2d 74 6f 2d 64 6f 75 |e pointe|r-to-dou|
|00000410| 62 6c 65 20 61 72 67 75 | 6d 65 6e 74 73 2e 0d 0d |ble argu|ments...|
|00000420| 55 73 65 20 47 44 54 69 | 6d 65 43 6c 75 74 28 29 |Use GDTi|meClut()|
|00000430| 20 69 6e 73 74 65 61 64 | 20 6f 66 20 74 68 65 20 | instead| of the |
|00000440| 6f 6c 64 20 66 75 6e 63 | 74 69 6f 6e 73 2c 20 47 |old func|tions, G|
|00000450| 44 46 72 61 6d 65 73 50 | 65 72 43 6c 75 74 55 70 |DFramesP|erClutUp|
|00000460| 64 61 74 65 2c 0d 47 44 | 43 6c 75 74 55 70 64 61 |date,.GD|ClutUpda|
|00000470| 74 65 52 61 74 65 2c 20 | 61 6e 64 20 47 44 54 69 |teRate, |and GDTi|
|00000480| 6d 65 43 6c 75 74 55 70 | 64 61 74 65 20 69 6e 20 |meClutUp|date in |
|00000490| 47 44 46 72 61 6d 65 52 | 61 74 65 2e 63 2e 20 54 |GDFrameR|ate.c. T|
|000004a0| 68 65 79 20 61 72 65 20 | 6e 6f 77 20 6f 62 73 6f |hey are |now obso|
|000004b0| 6c 65 74 65 2e 0d 0d 49 | 74 20 69 73 20 6f 66 20 |lete...I|t is of |
|000004c0| 69 6e 74 65 72 65 73 74 | 20 74 6f 20 74 69 6d 65 |interest| to time|
|000004d0| 20 47 44 53 65 74 45 6e | 74 72 69 65 73 20 28 61 | GDSetEn|tries (a|
|000004e0| 6e 64 20 69 74 73 20 73 | 69 62 6c 69 6e 67 20 47 |nd its s|ibling G|
|000004f0| 44 44 69 72 65 63 74 53 | 65 74 45 6e 74 72 69 65 |DDirectS|etEntrie|
|00000500| 73 29 20 61 74 0d 62 6f | 74 68 20 6e 6f 72 6d 61 |s) at.bo|th norma|
|00000510| 6c 20 28 7a 65 72 6f 29 | 20 61 6e 64 20 68 69 67 |l (zero)| and hig|
|00000520| 68 20 28 37 29 20 70 72 | 6f 63 65 73 73 6f 72 20 |h (7) pr|ocessor |
|00000530| 69 6e 74 65 72 72 75 70 | 74 20 70 72 69 6f 72 69 |interrup|t priori|
|00000540| 74 79 2c 20 62 65 63 61 | 75 73 65 20 73 6f 6d 65 |ty, beca|use some|
|00000550| 0d 64 72 69 76 65 72 73 | 20 61 72 65 20 61 73 79 |.drivers| are asy|
|00000560| 6e 63 68 72 6f 6e 6f 75 | 73 20 77 68 65 6e 20 72 |nchronou|s when r|
|00000570| 75 6e 20 61 74 20 6c 6f | 77 20 70 72 69 6f 72 69 |un at lo|w priori|
|00000580| 74 79 2c 20 72 65 74 75 | 72 6e 69 6e 67 20 69 6d |ty, retu|rning im|
|00000590| 6d 65 64 69 61 74 65 6c | 79 20 61 6e 64 0d 64 65 |mediatel|y and.de|
|000005a0| 66 65 72 72 69 6e 67 20 | 74 68 65 20 61 63 74 75 |ferring |the actu|
|000005b0| 61 6c 20 63 6c 75 74 20 | 6c 6f 61 64 69 6e 67 20 |al clut |loading |
|000005c0| 75 6e 74 69 6c 20 74 68 | 65 20 76 62 6c 20 69 6e |until th|e vbl in|
|000005d0| 74 65 72 72 75 70 74 20 | 6f 63 63 75 72 73 2c 20 |terrupt |occurs, |
|000005e0| 62 75 74 20 41 70 70 6c | 65 0d 73 70 65 63 69 66 |but Appl|e.specif|
|000005f0| 69 65 73 20 74 68 61 74 | 20 61 6c 6c 20 64 72 69 |ies that| all dri|
|00000600| 76 65 72 73 20 6d 75 73 | 74 20 62 65 20 73 79 6e |vers mus|t be syn|
|00000610| 63 68 72 6f 6e 6f 75 73 | 20 77 68 65 6e 20 72 75 |chronous| when ru|
|00000620| 6e 20 61 74 20 68 69 67 | 68 20 70 72 69 6f 72 69 |n at hig|h priori|
|00000630| 74 79 2e 20 59 6f 75 20 | 64 6f 0d 74 68 69 73 20 |ty. You |do.this |
|00000640| 62 79 20 73 75 70 70 6c | 79 69 6e 67 20 74 68 65 |by suppl|ying the|
|00000650| 20 6e 65 77 20 72 6f 75 | 74 69 6e 65 20 47 44 53 | new rou|tine GDS|
|00000660| 65 74 45 6e 74 72 69 65 | 73 42 79 54 79 70 65 48 |etEntrie|sByTypeH|
|00000670| 69 67 68 50 72 69 6f 72 | 69 74 79 28 29 2e 0d 0d |ighPrior|ity()...|
|00000680| 53 69 6d 69 6c 61 72 6c | 79 2c 20 77 68 69 6c 65 |Similarl|y, while|
|00000690| 20 74 68 65 20 70 72 6f | 62 6c 65 6d 20 6f 66 20 | the pro|blem of |
|000006a0| 6d 75 6c 74 69 70 6c 65 | 20 69 6e 74 65 72 72 75 |multiple| interru|
|000006b0| 70 74 73 20 70 65 72 20 | 66 72 61 6d 65 20 69 73 |pts per |frame is|
|000006c0| 20 64 65 61 6c 74 20 77 | 69 74 68 0d 73 61 74 69 | dealt w|ith.sati|
|000006d0| 73 66 61 63 74 6f 72 69 | 6c 79 20 62 79 20 56 42 |sfactori|ly by VB|
|000006e0| 4c 49 6e 73 74 61 6c 6c | 2e 63 2c 20 75 73 69 6e |LInstall|.c, usin|
|000006f0| 67 20 74 68 65 20 73 63 | 68 65 6d 65 20 73 75 67 |g the sc|heme sug|
|00000700| 67 65 73 74 65 64 20 62 | 79 20 52 61 79 6e 61 6c |gested b|y Raynal|
|00000710| 64 20 43 6f 6d 74 6f 69 | 73 2c 0d 69 74 20 69 73 |d Comtoi|s,.it is|
|00000720| 20 6f 66 20 74 65 63 68 | 6e 69 63 61 6c 20 69 6e | of tech|nical in|
|00000730| 74 65 72 65 73 74 20 74 | 6f 20 66 6f 6c 6c 6f 77 |terest t|o follow|
|00000740| 20 75 70 20 74 68 65 20 | 72 65 70 6f 72 74 20 74 | up the |report t|
|00000750| 68 61 74 20 74 68 65 72 | 65 20 61 72 65 20 6e 6f |hat ther|e are no|
|00000760| 20 65 78 74 72 61 0d 69 | 6e 74 65 72 72 75 70 74 | extra.i|nterrupt|
|00000770| 73 20 69 66 20 74 68 65 | 20 70 72 6f 63 65 73 73 |s if the| process|
|00000780| 6f 72 20 69 6e 73 74 72 | 75 63 74 69 6f 6e 20 63 |or instr|uction c|
|00000790| 61 63 68 65 20 69 73 20 | 64 69 73 61 62 6c 65 64 |ache is |disabled|
|000007a0| 2e 20 4f 6e 65 20 74 68 | 65 6f 72 79 20 74 6f 20 |. One th|eory to |
|000007b0| 61 63 63 6f 75 6e 74 0d | 66 6f 72 20 74 68 69 73 |account.|for this|
|000007c0| 20 69 73 20 74 68 61 74 | 20 70 65 72 68 61 70 73 | is that| perhaps|
|000007d0| 20 64 69 73 61 62 6c 69 | 6e 67 20 74 68 65 20 63 | disabli|ng the c|
|000007e0| 61 63 68 65 20 63 61 75 | 73 65 73 20 74 68 65 20 |ache cau|ses the |
|000007f0| 69 6e 74 65 72 72 75 70 | 74 20 73 65 72 76 69 63 |interrup|t servic|
|00000800| 65 0d 72 6f 75 74 69 6e | 65 20 74 6f 20 74 61 6b |e.routin|e to tak|
|00000810| 65 20 6c 6f 6e 67 20 65 | 6e 6f 75 67 68 20 74 68 |e long e|nough th|
|00000820| 61 74 20 74 68 65 20 68 | 61 72 64 77 61 72 65 20 |at the h|ardware |
|00000830| 69 6e 74 65 72 72 75 70 | 74 20 70 75 6c 73 65 20 |interrup|t pulse |
|00000840| 68 61 73 20 74 65 72 6d | 69 6e 61 74 65 64 0d 62 |has term|inated.b|
|00000850| 65 66 6f 72 65 20 74 68 | 65 20 72 6f 75 74 69 6e |efore th|e routin|
|00000860| 65 20 65 78 69 74 73 2e | 20 54 68 75 73 20 49 20 |e exits.| Thus I |
|00000870| 77 6f 75 6c 64 20 6c 69 | 6b 65 20 74 6f 20 77 72 |would li|ke to wr|
|00000880| 69 74 65 20 61 20 72 6f | 75 74 69 6e 65 20 63 61 |ite a ro|utine ca|
|00000890| 6c 6c 65 64 0d 47 44 53 | 65 74 45 6e 74 72 69 65 |lled.GDS|etEntrie|
|000008a0| 73 4e 6f 43 61 63 68 65 | 2c 20 62 75 74 20 49 20 |sNoCache|, but I |
|000008b0| 64 6f 6e 27 74 20 6b 6e | 6f 77 20 68 6f 77 20 74 |don't kn|ow how t|
|000008c0| 6f 20 64 69 73 61 62 6c | 65 20 74 68 65 20 63 61 |o disabl|e the ca|
|000008d0| 63 68 65 2e 0d 0d 48 49 | 53 54 4f 52 59 3a 0d 33 |che...HI|STORY:.3|
|000008e0| 2f 31 31 2f 39 33 09 64 | 67 70 20 63 72 65 61 74 |/11/93.d|gp creat|
|000008f0| 65 64 20 69 74 2c 20 62 | 61 73 65 64 20 6f 6e 20 |ed it, b|ased on |
|00000900| 47 44 54 69 6d 65 43 6c | 75 74 55 70 64 61 74 65 |GDTimeCl|utUpdate|
|00000910| 20 61 6e 64 20 47 44 46 | 72 61 6d 65 73 50 65 72 | and GDF|ramesPer|
|00000920| 43 6c 75 74 55 70 64 61 | 74 65 20 69 6e 0d 47 44 |ClutUpda|te in.GD|
|00000930| 46 72 61 6d 65 52 61 74 | 65 2e 63 2e 20 54 68 65 |FrameRat|e.c. The|
|00000940| 20 65 6e 68 61 6e 63 65 | 6d 65 6e 74 73 20 61 72 | enhance|ments ar|
|00000950| 65 20 31 2e 20 79 6f 75 | 20 73 75 70 70 6c 79 20 |e 1. you| supply |
|00000960| 74 68 65 20 66 75 6e 63 | 74 69 6f 6e 20 74 6f 20 |the func|tion to |
|00000970| 62 65 20 74 65 73 74 65 | 64 2c 0d 65 69 74 68 65 |be teste|d,.eithe|
|00000980| 72 20 53 65 74 45 6e 74 | 72 69 65 73 51 75 69 63 |r SetEnt|riesQuic|
|00000990| 6b 6c 79 20 6f 72 20 47 | 44 53 65 74 45 6e 74 72 |kly or G|DSetEntr|
|000009a0| 69 65 73 2e 20 32 2e 20 | 49 74 20 64 6f 65 73 6e |ies. 2. |It doesn|
|000009b0| 27 74 20 70 72 69 6e 74 | 20 6f 72 20 65 78 69 74 |'t print| or exit|
|000009c0| 2c 20 61 6c 77 61 79 73 | 0d 72 65 74 75 72 6e 69 |, always|.returni|
|000009d0| 6e 67 20 77 69 74 68 20 | 61 6e 20 69 6e 66 6f 72 |ng with |an infor|
|000009e0| 6d 61 74 69 76 65 20 4f | 53 45 72 72 2e 20 33 2e |mative O|SErr. 3.|
|000009f0| 20 49 74 20 6d 65 61 73 | 75 72 65 73 20 66 72 61 | It meas|ures fra|
|00000a00| 6d 65 20 72 61 74 65 20 | 69 6e 64 65 70 65 6e 64 |me rate |independ|
|00000a10| 65 6e 74 6c 79 2c 0d 77 | 68 69 63 68 20 69 74 20 |ently,.w|hich it |
|00000a20| 72 65 74 75 72 6e 73 2c | 20 61 6e 64 20 61 6c 73 |returns,| and als|
|00000a30| 6f 20 75 73 65 73 20 69 | 74 20 74 6f 20 65 73 74 |o uses i|t to est|
|00000a40| 69 6d 61 74 65 20 68 6f | 77 20 6d 61 6e 79 20 66 |imate ho|w many f|
|00000a50| 72 61 6d 65 20 69 6e 74 | 65 72 72 75 70 74 73 20 |rame int|errupts |
|00000a60| 77 65 72 65 0d 6d 69 73 | 73 65 64 20 64 75 72 69 |were.mis|sed duri|
|00000a70| 6e 67 20 65 61 63 68 20 | 63 6c 75 74 20 6c 6f 61 |ng each |clut loa|
|00000a80| 64 2e 20 34 2e 20 49 66 | 20 74 68 65 72 65 27 73 |d. 4. If| there's|
|00000a90| 20 61 74 20 6c 65 61 73 | 74 20 6f 6e 65 20 66 72 | at leas|t one fr|
|00000aa0| 61 6d 65 20 6d 69 73 73 | 69 6e 67 20 6f 72 20 69 |ame miss|ing or i|
|00000ab0| 66 20 74 68 65 0d 66 72 | 61 6d 65 20 63 6f 75 6e |f the.fr|ame coun|
|00000ac0| 74 20 69 73 20 76 65 72 | 79 20 73 6d 61 6c 6c 2c |t is ver|y small,|
|00000ad0| 20 6c 65 73 73 20 74 68 | 61 6e 20 30 2e 35 20 70 | less th|an 0.5 p|
|00000ae0| 65 72 20 63 61 6c 6c 2c | 20 74 68 65 6e 20 69 74 |er call,| then it|
|00000af0| 20 65 73 74 69 6d 61 74 | 65 73 20 74 68 65 20 66 | estimat|es the f|
|00000b00| 72 61 6d 65 73 0d 64 69 | 72 65 63 74 6c 79 20 66 |rames.di|rectly f|
|00000b10| 72 6f 6d 20 74 68 65 20 | 74 69 6d 65 2e 0d 0d 2a |rom the |time...*|
|00000b20| 2f 0d 23 69 6e 63 6c 75 | 64 65 20 3c 56 69 64 65 |/.#inclu|de <Vide|
|00000b30| 6f 54 6f 6f 6c 62 6f 78 | 2e 68 3e 0d 23 69 6e 63 |oToolbox|.h>.#inc|
|00000b40| 6c 75 64 65 20 3c 6d 61 | 74 68 2e 68 3e 0d 23 64 |lude <ma|th.h>.#d|
|00000b50| 65 66 69 6e 65 20 43 41 | 4c 4c 53 20 33 30 0d 2f |efine CA|LLS 30./|
|00000b60| 2f 20 4f 72 69 67 69 6e | 61 6c 20 74 79 70 65 64 |/ Origin|al typed|
|00000b70| 65 66 20 69 73 20 69 6e | 20 56 69 64 65 6f 54 6f |ef is in| VideoTo|
|00000b80| 6f 6c 62 6f 78 2e 68 0d | 2f 2f 74 79 70 65 64 65 |olbox.h.|//typede|
|00000b90| 66 20 4f 53 45 72 72 20 | 28 2a 53 65 74 45 6e 74 |f OSErr |(*SetEnt|
|00000ba0| 72 69 65 73 46 75 6e 63 | 74 69 6f 6e 29 28 47 44 |riesFunc|tion)(GD|
|00000bb0| 48 61 6e 64 6c 65 20 64 | 65 76 69 63 65 2c 73 68 |Handle d|evice,sh|
|00000bc0| 6f 72 74 20 73 74 61 72 | 74 2c 73 68 6f 72 74 20 |ort star|t,short |
|00000bd0| 63 6f 75 6e 74 0d 2f 2f | 09 2c 43 6f 6c 6f 72 53 |count.//|.,ColorS|
|00000be0| 70 65 63 20 2a 61 54 61 | 62 6c 65 29 3b 0d 0d 4f |pec *aTa|ble);..O|
|00000bf0| 53 45 72 72 20 47 44 54 | 69 6d 65 43 6c 75 74 28 |SErr GDT|imeClut(|
|00000c00| 47 44 48 61 6e 64 6c 65 | 20 64 65 76 69 63 65 2c |GDHandle| device,|
|00000c10| 53 65 74 45 6e 74 72 69 | 65 73 46 75 6e 63 74 69 |SetEntri|esFuncti|
|00000c20| 6f 6e 20 66 75 6e 63 74 | 69 6f 6e 2c 73 68 6f 72 |on funct|ion,shor|
|00000c30| 74 20 63 6c 75 74 45 6e | 74 72 69 65 73 0d 09 2c |t clutEn|tries..,|
|00000c40| 64 6f 75 62 6c 65 20 2a | 73 50 74 72 2c 64 6f 75 |double *|sPtr,dou|
|00000c50| 62 6c 65 20 2a 66 72 61 | 6d 65 73 50 74 72 2c 64 |ble *fra|mesPtr,d|
|00000c60| 6f 75 62 6c 65 20 2a 6d | 69 73 73 69 6e 67 46 72 |ouble *m|issingFr|
|00000c70| 61 6d 65 73 50 74 72 2c | 64 6f 75 62 6c 65 20 2a |amesPtr,|double *|
|00000c80| 66 72 61 6d 65 52 61 74 | 65 50 74 72 29 0d 7b 0d |frameRat|ePtr).{.|
|00000c90| 09 4f 53 45 72 72 20 65 | 72 72 6f 72 3b 0d 09 73 |.OSErr e|rror;..s|
|00000ca0| 68 6f 72 74 20 6d 6f 64 | 65 2c 63 6c 75 74 53 69 |hort mod|e,clutSi|
|00000cb0| 7a 65 2c 69 3b 0d 09 43 | 6f 6c 6f 72 53 70 65 63 |ze,i;..C|olorSpec|
|00000cc0| 20 2a 74 61 62 6c 65 2c | 2a 6c 69 6e 65 61 72 54 | *table,|*linearT|
|00000cd0| 61 62 6c 65 3d 4e 55 4c | 4c 3b 0d 09 73 74 61 74 |able=NUL|L;..stat|
|00000ce0| 69 63 20 56 42 4c 54 61 | 73 6b 41 6e 64 41 35 20 |ic VBLTa|skAndA5 |
|00000cf0| 76 62 6c 44 61 74 61 3b | 0d 09 6c 6f 6e 67 20 66 |vblData;|..long f|
|00000d00| 72 61 6d 65 73 3b 0d 09 | 54 69 6d 65 72 20 2a 74 |rames;..|Timer *t|
|00000d10| 69 6d 65 72 3b 0d 09 64 | 6f 75 62 6c 65 20 73 2c |imer;..d|ouble s,|
|00000d20| 6d 69 73 73 69 6e 67 46 | 72 61 6d 65 73 2c 66 72 |missingF|rames,fr|
|00000d30| 61 6d 65 52 61 74 65 3b | 0d 0d 09 69 66 28 73 50 |ameRate;|...if(sP|
|00000d40| 74 72 21 3d 4e 55 4c 4c | 29 2a 73 50 74 72 3d 4e |tr!=NULL|)*sPtr=N|
|00000d50| 41 4e 3b 0d 09 69 66 28 | 66 72 61 6d 65 73 50 74 |AN;..if(|framesPt|
|00000d60| 72 21 3d 4e 55 4c 4c 29 | 2a 66 72 61 6d 65 73 50 |r!=NULL)|*framesP|
|00000d70| 74 72 3d 4e 41 4e 3b 0d | 09 69 66 28 6d 69 73 73 |tr=NAN;.|.if(miss|
|00000d80| 69 6e 67 46 72 61 6d 65 | 73 50 74 72 21 3d 4e 55 |ingFrame|sPtr!=NU|
|00000d90| 4c 4c 29 2a 6d 69 73 73 | 69 6e 67 46 72 61 6d 65 |LL)*miss|ingFrame|
|00000da0| 73 50 74 72 3d 4e 41 4e | 3b 0d 09 69 66 28 66 72 |sPtr=NAN|;..if(fr|
|00000db0| 61 6d 65 52 61 74 65 50 | 74 72 21 3d 4e 55 4c 4c |ameRateP|tr!=NULL|
|00000dc0| 29 2a 66 72 61 6d 65 52 | 61 74 65 50 74 72 3d 4e |)*frameR|atePtr=N|
|00000dd0| 41 4e 3b 0d 09 63 6c 75 | 74 53 69 7a 65 3d 47 44 |AN;..clu|tSize=GD|
|00000de0| 43 6c 75 74 53 69 7a 65 | 28 64 65 76 69 63 65 29 |ClutSize|(device)|
|00000df0| 3b 0d 09 69 66 28 63 6c | 75 74 45 6e 74 72 69 65 |;..if(cl|utEntrie|
|00000e00| 73 3c 30 20 7c 7c 20 63 | 6c 75 74 45 6e 74 72 69 |s<0 || c|lutEntri|
|00000e10| 65 73 3e 63 6c 75 74 53 | 69 7a 65 29 72 65 74 75 |es>clutS|ize)retu|
|00000e20| 72 6e 20 31 3b 0d 09 69 | 66 28 63 6c 75 74 45 6e |rn 1;..i|f(clutEn|
|00000e30| 74 72 69 65 73 3d 3d 30 | 29 63 6c 75 74 45 6e 74 |tries==0|)clutEnt|
|00000e40| 72 69 65 73 3d 63 6c 75 | 74 53 69 7a 65 3b 0d 09 |ries=clu|tSize;..|
|00000e50| 65 72 72 6f 72 3d 47 44 | 47 65 74 4d 6f 64 65 28 |error=GD|GetMode(|
|00000e60| 64 65 76 69 63 65 2c 26 | 6d 6f 64 65 2c 4e 55 4c |device,&|mode,NUL|
|00000e70| 4c 2c 4e 55 4c 4c 29 3b | 0d 09 69 66 28 65 72 72 |L,NULL);|..if(err|
|00000e80| 6f 72 29 6d 6f 64 65 3d | 28 2a 2a 64 65 76 69 63 |or)mode=|(**devic|
|00000e90| 65 29 2e 67 64 4d 6f 64 | 65 3b 0d 09 69 66 28 6d |e).gdMod|e;..if(m|
|00000ea0| 6f 64 65 3e 65 69 67 68 | 74 42 69 74 4d 6f 64 65 |ode>eigh|tBitMode|
|00000eb0| 29 7b 0d 09 09 69 66 28 | 66 75 6e 63 74 69 6f 6e |){...if(|function|
|00000ec0| 3d 3d 47 44 53 65 74 45 | 6e 74 72 69 65 73 29 66 |==GDSetE|ntries)f|
|00000ed0| 75 6e 63 74 69 6f 6e 3d | 47 44 44 69 72 65 63 74 |unction=|GDDirect|
|00000ee0| 53 65 74 45 6e 74 72 69 | 65 73 3b 0d 09 09 74 61 |SetEntri|es;...ta|
|00000ef0| 62 6c 65 3d 6c 69 6e 65 | 61 72 54 61 62 6c 65 3d |ble=line|arTable=|
|00000f00| 28 43 6f 6c 6f 72 53 70 | 65 63 20 2a 29 4e 65 77 |(ColorSp|ec *)New|
|00000f10| 50 74 72 28 63 6c 75 74 | 53 69 7a 65 2a 73 69 7a |Ptr(clut|Size*siz|
|00000f20| 65 6f 66 28 6c 69 6e 65 | 61 72 54 61 62 6c 65 5b |eof(line|arTable[|
|00000f30| 30 5d 29 29 3b 0d 09 09 | 69 66 28 6c 69 6e 65 61 |0]));...|if(linea|
|00000f40| 72 54 61 62 6c 65 3d 3d | 4e 55 4c 4c 29 72 65 74 |rTable==|NULL)ret|
|00000f50| 75 72 6e 20 4d 65 6d 45 | 72 72 6f 72 28 29 3b 0d |urn MemE|rror();.|
|00000f60| 09 09 66 6f 72 28 69 3d | 30 3b 69 3c 63 6c 75 74 |..for(i=|0;i<clut|
|00000f70| 53 69 7a 65 3b 69 2b 2b | 29 7b 0d 09 09 09 74 61 |Size;i++|){....ta|
|00000f80| 62 6c 65 2d 3e 72 67 62 | 2e 72 65 64 3d 74 61 62 |ble->rgb|.red=tab|
|00000f90| 6c 65 2d 3e 72 67 62 2e | 67 72 65 65 6e 3d 74 61 |le->rgb.|green=ta|
|00000fa0| 62 6c 65 2d 3e 72 67 62 | 2e 62 6c 75 65 3d 28 6c |ble->rgb|.blue=(l|
|00000fb0| 6f 6e 67 29 30 78 66 66 | 66 66 2a 69 2f 28 63 6c |ong)0xff|ff*i/(cl|
|00000fc0| 75 74 53 69 7a 65 2d 31 | 29 3b 0d 09 09 09 74 61 |utSize-1|);....ta|
|00000fd0| 62 6c 65 2b 2b 3b 0d 09 | 09 7d 0d 09 7d 65 6c 73 |ble++;..|.}..}els|
|00000fe0| 65 20 74 61 62 6c 65 3d | 28 28 2a 2a 28 2a 2a 28 |e table=|((**(**(|
|00000ff0| 2a 2a 64 65 76 69 63 65 | 29 2e 67 64 50 4d 61 70 |**device|).gdPMap|
|00001000| 29 2e 70 6d 54 61 62 6c | 65 29 29 2e 63 74 54 61 |).pmTabl|e)).ctTa|
|00001010| 62 6c 65 3b 0d 09 76 62 | 6c 44 61 74 61 2e 73 75 |ble;..vb|lData.su|
|00001020| 62 72 6f 75 74 69 6e 65 | 3d 4e 55 4c 4c 3b 09 09 |broutine|=NULL;..|
|00001030| 09 09 09 09 2f 2f 20 73 | 65 74 75 70 20 66 72 61 |....// s|etup fra|
|00001040| 6d 65 20 63 6f 75 6e 74 | 65 72 0d 09 65 72 72 6f |me count|er..erro|
|00001050| 72 3d 56 42 4c 49 6e 73 | 74 61 6c 6c 28 26 76 62 |r=VBLIns|tall(&vb|
|00001060| 6c 44 61 74 61 2c 64 65 | 76 69 63 65 2c 43 41 4c |lData,de|vice,CAL|
|00001070| 4c 53 2a 32 30 29 3b 09 | 09 2f 2f 20 73 65 74 75 |LS*20);.|.// setu|
|00001080| 70 20 66 72 61 6d 65 20 | 63 6f 75 6e 74 65 72 0d |p frame |counter.|
|00001090| 09 69 66 28 65 72 72 6f | 72 29 72 65 74 75 72 6e |.if(erro|r)return|
|000010a0| 20 65 72 72 6f 72 3b 0d | 09 74 69 6d 65 72 3d 4e | error;.|.timer=N|
|000010b0| 65 77 54 69 6d 65 72 28 | 29 3b 09 09 09 09 09 09 |ewTimer(|);......|
|000010c0| 09 09 2f 2f 20 73 65 74 | 75 70 20 74 69 6d 65 72 |..// set|up timer|
|000010d0| 0d 09 69 66 28 74 69 6d | 65 72 3d 3d 4e 55 4c 4c |..if(tim|er==NULL|
|000010e0| 29 72 65 74 75 72 6e 20 | 31 3b 09 09 09 09 09 09 |)return |1;......|
|000010f0| 2f 2f 20 6c 61 63 6b 73 | 20 52 65 76 69 73 65 64 |// lacks| Revised|
|00001100| 20 54 69 6d 65 20 4d 61 | 6e 61 67 65 72 2e 0d 09 | Time Ma|nager...|
|00001110| 76 62 6c 44 61 74 61 2e | 76 62 6c 2e 76 62 6c 43 |vblData.|vbl.vblC|
|00001120| 6f 75 6e 74 3d 31 3b 09 | 09 09 09 09 09 09 2f 2f |ount=1;.|......//|
|00001130| 20 45 6e 61 62 6c 65 20 | 69 6e 74 65 72 72 75 70 | Enable |interrup|
|00001140| 74 20 73 65 72 76 69 63 | 65 20 72 6f 75 74 69 6e |t servic|e routin|
|00001150| 65 0d 09 66 6f 72 28 69 | 3d 2d 31 3b 69 3c 43 41 |e..for(i|=-1;i<CA|
|00001160| 4c 4c 53 3b 69 2b 2b 29 | 20 7b 0d 09 09 65 72 72 |LLS;i++)| {...err|
|00001170| 6f 72 3d 28 66 75 6e 63 | 74 69 6f 6e 29 28 64 65 |or=(func|tion)(de|
|00001180| 76 69 63 65 2c 30 2c 63 | 6c 75 74 45 6e 74 72 69 |vice,0,c|lutEntri|
|00001190| 65 73 2d 31 2c 74 61 62 | 6c 65 29 3b 0d 09 09 69 |es-1,tab|le);...i|
|000011a0| 66 28 69 3d 3d 2d 31 29 | 7b 0d 09 09 09 53 74 61 |f(i==-1)|{....Sta|
|000011b0| 72 74 54 69 6d 65 72 28 | 74 69 6d 65 72 29 3b 0d |rtTimer(|timer);.|
|000011c0| 09 09 09 66 72 61 6d 65 | 73 3d 76 62 6c 44 61 74 |...frame|s=vblDat|
|000011d0| 61 2e 66 72 61 6d 65 73 | 4c 65 66 74 3b 0d 09 09 |a.frames|Left;...|
|000011e0| 7d 0d 09 09 69 66 28 65 | 72 72 6f 72 29 62 72 65 |}...if(e|rror)bre|
|000011f0| 61 6b 3b 0d 09 7d 0d 09 | 66 72 61 6d 65 73 2d 3d |ak;..}..|frames-=|
|00001200| 76 62 6c 44 61 74 61 2e | 66 72 61 6d 65 73 4c 65 |vblData.|framesLe|
|00001210| 66 74 3b 0d 09 73 3d 53 | 74 6f 70 54 69 6d 65 72 |ft;..s=S|topTimer|
|00001220| 53 65 63 73 28 74 69 6d | 65 72 29 3b 0d 09 56 42 |Secs(tim|er);..VB|
|00001230| 4c 52 65 6d 6f 76 65 28 | 26 76 62 6c 44 61 74 61 |LRemove(|&vblData|
|00001240| 29 3b 0d 09 44 69 73 70 | 6f 73 65 54 69 6d 65 72 |);..Disp|oseTimer|
|00001250| 28 74 69 6d 65 72 29 3b | 0d 09 69 66 28 6c 69 6e |(timer);|..if(lin|
|00001260| 65 61 72 54 61 62 6c 65 | 21 3d 4e 55 4c 4c 29 44 |earTable|!=NULL)D|
|00001270| 69 73 70 6f 73 65 50 74 | 72 28 28 50 74 72 29 6c |isposePt|r((Ptr)l|
|00001280| 69 6e 65 61 72 54 61 62 | 6c 65 29 3b 0d 09 69 66 |inearTab|le);..if|
|00001290| 28 65 72 72 6f 72 29 72 | 65 74 75 72 6e 20 65 72 |(error)r|eturn er|
|000012a0| 72 6f 72 3b 0d 09 0d 09 | 2f 2f 20 45 73 74 69 6d |ror;....|// Estim|
|000012b0| 61 74 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 6d 69 |ate numb|er of mi|
|000012c0| 73 73 69 6e 67 20 66 72 | 61 6d 65 73 20 62 79 20 |ssing fr|ames by |
|000012d0| 64 69 73 63 72 65 70 61 | 6e 63 79 20 62 65 74 77 |discrepa|ncy betw|
|000012e0| 65 65 6e 20 66 72 61 6d | 65 73 20 61 6e 64 20 73 |een fram|es and s|
|000012f0| 65 63 73 2e 0d 09 66 72 | 61 6d 65 52 61 74 65 3d |ecs...fr|ameRate=|
|00001300| 47 44 46 72 61 6d 65 52 | 61 74 65 28 64 65 76 69 |GDFrameR|ate(devi|
|00001310| 63 65 29 3b 0d 09 6d 69 | 73 73 69 6e 67 46 72 61 |ce);..mi|ssingFra|
|00001320| 6d 65 73 3d 73 2a 66 72 | 61 6d 65 52 61 74 65 2d |mes=s*fr|ameRate-|
|00001330| 66 72 61 6d 65 73 3b 0d | 09 0d 09 2f 2f 20 52 65 |frames;.|...// Re|
|00001340| 74 75 72 6e 20 72 65 73 | 75 6c 74 73 0d 09 69 66 |turn res|ults..if|
|00001350| 28 73 50 74 72 21 3d 4e | 55 4c 4c 29 2a 73 50 74 |(sPtr!=N|ULL)*sPt|
|00001360| 72 3d 73 2f 43 41 4c 4c | 53 3b 0d 09 69 66 28 66 |r=s/CALL|S;..if(f|
|00001370| 72 61 6d 65 73 50 74 72 | 21 3d 4e 55 4c 4c 29 7b |ramesPtr|!=NULL){|
|00001380| 0d 09 09 69 66 28 66 61 | 62 73 28 6d 69 73 73 69 |...if(fa|bs(missi|
|00001390| 6e 67 46 72 61 6d 65 73 | 29 3e 31 2e 20 7c 7c 20 |ngFrames|)>1. || |
|000013a0| 66 72 61 6d 65 73 3c 43 | 41 4c 4c 53 2f 32 29 20 |frames<C|ALLS/2) |
|000013b0| 2a 66 72 61 6d 65 73 50 | 74 72 3d 66 72 61 6d 65 |*framesP|tr=frame|
|000013c0| 52 61 74 65 2a 73 2f 43 | 41 4c 4c 53 3b 0d 09 09 |Rate*s/C|ALLS;...|
|000013d0| 65 6c 73 65 20 2a 66 72 | 61 6d 65 73 50 74 72 3d |else *fr|amesPtr=|
|000013e0| 66 72 61 6d 65 73 2f 28 | 64 6f 75 62 6c 65 29 43 |frames/(|double)C|
|000013f0| 41 4c 4c 53 3b 0d 09 7d | 0d 09 69 66 28 6d 69 73 |ALLS;..}|..if(mis|
|00001400| 73 69 6e 67 46 72 61 6d | 65 73 50 74 72 21 3d 4e |singFram|esPtr!=N|
|00001410| 55 4c 4c 29 2a 6d 69 73 | 73 69 6e 67 46 72 61 6d |ULL)*mis|singFram|
|00001420| 65 73 50 74 72 3d 6d 69 | 73 73 69 6e 67 46 72 61 |esPtr=mi|ssingFra|
|00001430| 6d 65 73 2f 43 41 4c 4c | 53 3b 0d 09 69 66 28 66 |mes/CALL|S;..if(f|
|00001440| 72 61 6d 65 52 61 74 65 | 50 74 72 21 3d 4e 55 4c |rameRate|Ptr!=NUL|
|00001450| 4c 29 2a 66 72 61 6d 65 | 52 61 74 65 50 74 72 3d |L)*frame|RatePtr=|
|00001460| 66 72 61 6d 65 52 61 74 | 65 3b 0d 09 72 65 74 75 |frameRat|e;..retu|
|00001470| 72 6e 20 30 3b 0d 7d 0d | 00 00 00 00 00 00 00 00 |rn 0;.}.|........|
|00001480| 00 00 01 00 00 00 01 6e | 00 00 00 6e 00 00 00 46 |.......n|...n...F|
|00001490| 41 53 46 4c 41 50 50 4c | 04 00 00 00 00 00 00 07 |ASFLAPPL|........|
|000014a0| af c0 00 40 0b 01 41 53 | 46 4c 41 50 50 4c 05 00 |...@..AS|FLAPPL..|
|000014b0| 0c 47 44 54 69 6d 65 43 | 6c 75 74 2e 63 43 02 00 |.GDTimeC|lut.cC..|
|000014c0| 00 00 54 45 58 54 4b 41 | 48 4c 00 00 00 00 00 00 |..TEXTKA|HL......|
|000014d0| 00 00 54 45 58 54 4b 41 | 48 4c 00 00 00 00 00 00 |..TEXTKA|HL......|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 a7 e5 d5 b6 00 00 | 00 00 00 00 01 b4 41 53 |........|......AS|
|00001500| 50 53 70 61 75 6c ff 00 | 00 00 00 00 00 11 ea c0 |PSpaul..|........|
|00001510| 01 00 0b 01 41 54 41 43 | 63 64 65 76 01 00 00 00 |....ATAC|cdev....|
|00001520| 00 00 00 15 af c0 01 00 | 0b 01 41 54 4d 43 41 54 |........|..ATMCAT|
|00001530| 4d 44 01 00 00 00 00 00 | 00 15 83 c0 01 00 0b 01 |MD......|........|
|00001540| 41 54 4d 43 63 64 65 76 | 01 00 00 00 00 00 00 15 |ATMCcdev|........|
|00001550| 82 c0 01 00 0b 01 41 54 | 4d 43 78 64 65 76 01 00 |......AT|MCxdev..|
|00001560| 00 00 00 00 00 1e 92 64 | 01 00 0b 01 41 54 79 70 |.......d|....ATyp|
|00001570| 41 50 50 4c 01 00 00 00 | 00 00 00 01 b3 00 01 00 |APPL....|........|
|00001580| 00 00 00 0a 00 00 12 cd | 00 6d 00 00 00 00 00 00 |........|.m......|
|00001590| 00 5c 00 04 00 18 00 00 | 12 75 00 69 00 e8 0b 34 |.\......|.u.i...4|
|000015a0| 00 00 09 66 72 61 6d 65 | 52 61 74 65 00 1c 00 00 |...frame|Rate....|
|000015b0| 12 95 00 6a 00 e8 0a c4 | 00 00 0d 6d 69 73 73 69 |...j....|...missi|
|000015c0| 6e 67 46 72 61 6d 65 73 | 00 16 00 00 13 4e 00 70 |ngFrames|.....N.p|
|000015d0| 00 e8 0b 64 00 00 07 66 | 72 61 6d 65 73 20 00 10 |...d...f|rames ..|
|000015e0| 00 00 13 01 00 6f 00 e8 | 0b 30 00 00 01 73 00 00 |.....o..|.0...s..|
|000015f0| 01 00 00 00 01 6e 00 00 | 00 6e 00 00 00 46 00 5e |.....n..|.n...F.^|
|00001600| f7 84 14 34 00 00 00 1c | 00 46 00 01 42 4b 50 54 |...4....|.F..BKPT|
|00001610| 00 00 00 12 44 54 56 55 | 00 00 00 1e 75 6e ff ff |....DTVU|....un..|
|00001620| 00 00 00 00 00 00 00 00 | 6e b9 ff ff 00 00 00 0e |........|n.......|
|00001630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+